% ablockinfo
% function block = ReadBlock_OES(ablockinfo)


% ## Description
%     read block OES
% ## Ref
%     <nastran-dmap-2018.pdf> P401
% ## End

ablockinfo.name
record = ablockinfo.record
for ii = 1:length(record)
    arecord = record(ii)
    tabStart = arecord.TablesStart
    for jj = 1:length(tabStart)
        pointStart = tabStart(jj)
        fseek(op2.fid,0,'bof');


        fseek(op2.fid, ablockinfo.record(jj*2 - 1).TablesStart + 4, -1);

ACODE = fread(op2.fid, 1, 'int32')
TCODE = fread(op2.fid, 1, 'int32')
ELTYPE = fread(op2.fid, 1, 'int32')
SUBCASE = fread(op2.fid, 1, 'int32')

if floor(TCODE/1000)


        

    end


end